home *** CD-ROM | disk | FTP | other *** search
/ PC Player 1999 June / PCP0699A.iso / Demos / Malkari / Tutorial3.dxr / 00251_repeat -1.ls < prev    next >
Encoding:
Text File  |  1999-03-03  |  237 b   |  14 lines
  1. on exitFrame
  2.   global repeat
  3.   if repeat > 40 then
  4.     set repeat to 0
  5.     repeat while the mouseUp
  6.       cursor(282 + (the timer / 45 mod 2))
  7.     end repeat
  8.     cursor(-1)
  9.     go(the frame + 1)
  10.   else
  11.     go(the frame - 1)
  12.   end if
  13. end
  14.